home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 6: Level 6 / 17 Bit - Level 6 (1998)(Epic Marketing)[!].iso / quartz / q1171.dms / q1171.adf / FSList / Rexx / FSList.rexx next >
OS/2 REXX Batch file  |  1997-04-10  |  631b  |  33 lines
  1. /***************************************************************************
  2. **                         FSList startup script.                         **
  3. ***************************************************************************/
  4.  
  5. /*
  6. ** We want results
  7. */
  8. Options results
  9.  
  10. /*
  11. ** Make CygnusEd screen public
  12. */
  13. menu 1 15 2
  14.  
  15. /*
  16. ** Move CygnusEd screen to front
  17. */
  18. cedtofront
  19.  
  20. /*
  21. ** Get the filename from CygnusEd (placed in result)
  22. */
  23. status 19
  24.  
  25. /*
  26. ** Start FSList in the background
  27. ** If registered use the following instead:
  28. **
  29. */
  30. address command 'Run >NIL:' 'C:FSList' 'CX_POPKEY' '"alt l"' 'CX_PRIORITY' 1 'FILE' result
  31.  
  32. RETURN
  33.